--[[ 编码: WMS-05-02 名称: 逻辑库区-删除后 作者:HAN 日期:2025-1-29 级别:固定 (说明本段代码在项目中不太会变化) 函数: AfterDataObjDelete 功能: 1)删除【逻辑库区货位关联表】 更改记录: --]] json = require ("json") mobox = require ("OILua_JavelinExt") m3 = require("oi_base_mobox") function AfterDataObjDelete ( strLuaDEID ) local nRet, strRetInfo -- step1 获取删除逻辑库区的编码 nRet, strRetInfo = mobox.getCurEditDataObjAttr( strLuaDEID, "S_CODE" ) if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! "..strRetInfo ) end local obj_attrs = json.decode( strRetInfo ) local strZoneCode = obj_attrs[1].value -- 逻辑库区编码 -- 删除 【逻辑库区货位关联表】 if ( strZoneCode ~= '') then local strCondition = "S_ZONE_CODE = '" .. strZoneCode .."'" nRet, strRetInfo = mobox.dbdeleteData(strLuaDEID, "Zone_Loc", strCondition) if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "删除【逻辑库区货位关联表】失败!"..strRetInfo) end end end